<?php

/*
	[Discuz!] (C)2001-2007 Comsenz Inc.
	This is NOT a freeware, use is subject to license terms

	$Id: xml.class.php 9806 2007-08-15 06:04:37Z cnteacher $
*/
///////////////////////////////////////////////////////////
//分析者：SamPeng
//分析时间：2008年10月16日15:47:28
//分析文件名：include/XML.class.php
///////////////////////////////////////////////////////////

//XML的解析序列化
function xml_unserialize(&$xml) {
	//建立XML对象
	$xml_parser = new XML();
	//开始XML解析
	$data = $xml_parser->parse($xml);
	//对象销毁
	$xml_parser->destruct();
	//将xml数据进行格式化
	$arr = xml_format_array($data);
	//返回$arr的根目录
	return $arr['root'];
}
//XML序列化函数
function xml_serialize(&$data, $htmlon = 0, $level = 1) {
	//重复$level长度的空格符。
	$space = str_repeat("\t", $level);
	$cdatahead = $htmlon ? '<![CDATA[' : '';
	$cdatafoot = $htmlon ? ']]>' : '';
	$s = '';
	if(!empty($data)) {
		foreach($data as $key=>$val) {
			if(!is_array($val)) {
				$val = "$cdatahead$val$cdatafoot";
				if(is_numeric($key)) {
					$s .=  "$space<item_$key>$val</item_$key>";
				} elseif($key === '') {
					$s .= '';
				} else {
					$s .= "$space<$key>$val</$key>";
				}
			} else {
				if(is_numeric($key)) {
					$s .=  "$space<item_$key>".xml_serialize($val, $htmlon, $level+1)."$space</item_$key>";
				} elseif($key === '') {
					$s .= '';
				} else {
					$s .= "$space<$key>".xml_serialize($val, $htmlon, $level+1)."$space</$key>";
				}
			}
		}
	}
	$s = preg_replace("/([\x01-\x09\x0b-\x0c\x0e-\x1f])+/", ' ', $s);
	//返回XML序列化后的字符串
	return ($level == 1 ? "<?xml version=\"1.0\" encoding=\"ISO-8859-1\"?><root>" : '').$s.($level == 1 ? '</root>' : '');
}

//XML格式化成数组
function xml_format_array($arr, $level = 0) {
	foreach((array)$arr as $key=>$val) {
		if(is_array($val)) {
			$val = xml_format_array($val, $level + 1);
		}
		if(is_string($key) && strpos($key, 'item_') === 0) {
			$arr[intval(substr($key, 5))] = $val;
			unset($arr[$key]);
		} else {
			$arr[$key] = $val;
		}
	}
	return $arr;
}
/**
 * XML类
 *
 */
class XML {
	var $parser;
	var $document;
	var $parent;
	var $stack;
	var $last_opened_tag;

	function XML() {
		//建立一个XML解析器
		$this->parser = xml_parser_create('ISO-8859-1');
		//为$this->parser解析器进行选项设置，XML_OPTION_CASE_FOLDING：控制在该 XML 解析器中 大小写折叠（case-folding） 是否有效。其默认值为有效。
		//在这里设置为假
		xml_parser_set_option($this->parser, XML_OPTION_CASE_FOLDING, false);
		//将解析器的对象制定为自身的对象
		xml_set_object($this->parser, $this);
		//建立起始和终止元素处理器
		xml_set_element_handler($this->parser, 'open','close');
		//建立字符数据处理器
		xml_set_character_data_handler($this->parser, 'data');
	}
	//销毁对象
	function destruct() {
		xml_parser_free($this->parser);
	}

	function parse(&$data) {
		$this->document = array();
		$this->stack	= array();
		$this->parent   = &$this->document;
		//开始解析$data数据，如果能够解析，返回$this->document.不能则返回空
		return xml_parse($this->parser, $data, true) ? $this->document : NULL;
	}
	/**
	 * 这里是用来设定上面所说的开始元素处理器
	 *
	 * @param resource $parser 指定的解析器
	 * @param string $tag 该处理器为之被调用的元素名
	 * @param unknown_type $attributes attribs 为一个包含有对应元素的属性的数组（如果该元素有属性）
	 */
	function open(&$parser, $tag, $attributes) {
		$this->data = '';
		$this->last_opened_tag = $tag;
		if(is_array($this->parent) and array_key_exists($tag,$this->parent)) {
			if(is_array($this->parent[$tag]) and array_key_exists(0,$this->parent[$tag])) {
				$key = count_numeric_items($this->parent[$tag]);
			}else{
				if(array_key_exists($tag.'_attr',$this->parent)) {
					$arr = array('0_attr'=>&$this->parent[$tag.'_attr'], &$this->parent[$tag]);
					unset($this->parent[$tag.'_attr']);
				} else {
					$arr = array(&$this->parent[$tag]);
				}
				$this->parent[$tag] = &$arr;
				$key = 1;
			}
			$this->parent = &$this->parent[$tag];
		} else {
			$key = $tag;
		}
		if($attributes) {
			$this->parent[$key.'_attr'] = $attributes;
		}
		$this->parent  = &$this->parent[$key];
		$this->stack[] = &$this->parent;
	}
	/**
	 * 字符数据处理器
	 *
	 * @param resource $parser 处理器句柄
	 * @param array $data 字符数据
	 */
	function data(&$parser, $data) {
		if($this->last_opened_tag != NULL)
			$this->data .= $data;
	}
	/**
	 * 结束元素处理器
	 *
	 * @param resource $parser 处理器句柄
	 * @param string $tag 结束标记
	 */
	function close(&$parser, $tag) {
		if($this->last_opened_tag == $tag) {
			$this->parent = $this->data;
			$this->last_opened_tag = NULL;
		}
		array_pop($this->stack);
		if($this->stack) $this->parent = &$this->stack[count($this->stack)-1];
	}
}
/**
 * 计算items的次数
 *
 * @param array $array
 * @return int 返回数组中以"is_numeric"为过滤词的数组键名次数。
 */
function count_numeric_items(&$array) {
	return is_array($array) ? count(array_filter(array_keys($array), 'is_numeric')) : 0;
}

?>